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1 READ = REFRESH CACHE PENDING 1 
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IF ROW BEING ACCESSED DOES NOT HAVE A 
CORRESPONDING DIRTY UNE THEN DO REFRESH 

AND READ SUBSTANTIALLY SIMULTANEOUSLY; 
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OTHERWISE IF BANK BEING ACCESSED 
CORRESPONDS TO A UNE STORED IN CACHE 
TH^N DO BLOCK REFRESH AND READ CACHE 
SUBSTANTIALLY SIMULTANEOUSLY WITH aUSH; 
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OTHERWISE DO BLOCK REFRESH AND READ 
SUBSTANTIALLY SIMULTANEOUSLY WITH RUSH 
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INPUTS 

Refresh Counter: rb. rr i* refresh bank, refresh row */ 

Current Access Address: wb, wr r access (write) bank and row */ 
Number of rows In a bank: row 

BUFFERS 

Valicl[row] r valid bits for each of the rows in the cache bankV 

Dirty[row] /* dirty bits for cache lines*/ 

Cache[rowJ r cache bank V 

Cachetag[row] r Tag for cache lines V 

FUNCTIONS 

RefreshO {mem[rb, rr] = mem[rb. rr]; } 

FlushO {mem[cachetag[wrj, wrj = cache[wr] $$ dirty[wr] = 0;} 

r WB dirty line V 

ReadUpdateCQ {data_out = mem[wb. wr] $$ cache[wr] = memlwb, wr] 

$$ cachetag[wr] ^ wb; } 
ReadO {data_out = mem§wb. wr]; > 

Write() {mem[wb, wr] = datajn; } 

ReadCacheO {data_out = cache[wr] $$ cache[wr] = cache[wr];} 
WriteCacheQ {cachefwr] = data Jn $$ cachetaglwrj = wb $$ dirty[wr] = 1;} 
WrrteBothO {WriteQ $$ Writecache()$$ dirtylwr] = 0; } 
r write to both the cache and memory V 

($$ - means operations are done in parallel) 

PSEUDO PROGRAM DESCRIPTION 

I* Initialize all cachetags to be NULL V 
CachetagH = NULL; 

r* READ***/ 

/♦ No refresh pending V 

if (no refresh pending) { 

if (no dirty line) {ReadUpdateCQ; } 

else /* there is a dirty line */ { 

if (!dirty[wr]) { ReadUpdateC();} 

else if (wb == cachetaglwrj) { ReadCache() $$ Flush() $$ dirtylwr] = 0; } 
else { ReadO FlushQ; } 
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t* -Refresh pending */ 

else{ 

If (rb != cache) { 

If (no dirty line) { 

if (rb 1= wb) { ReadO $$ Refresh(); } 
else{/*rb==wb V 

if (wb == tagfwrj) 

{ ReadCacheO $$ RefreshQ; } 

else { 

If (wr == n-) ReadUpdateCO; 

else Block.refresh $$ ReadUpdateC(); 

) 

} 

> 

else r there is a dirty line V 
If (rb 1= wb){ 

RefreshO $$ 
lf(taglwr]l= wb){ 

if (dirtylwrj) { FlushQ $$ Read();} 
else ReadUpdateCO; 

) 

else{ 

If (dirtylwrj) { ReadCacheQ $$ Flush();> 
else Read(}; 

} 

}/*endiffb!=wbV 

else { r refresh bank is the same as the accessed bank V 
ff(wr==rr){ 

if (tag[wr]N wb){ 

if (dirty[wr]) {FlushQ $$ Read() 
$$ UpdateRefreshCounterO; } 
else {ReadUpdateCO $$ Update Refresh 

CntrO;} 
} 

else{ 

if (dirty[wr]) { ReadCache() $$ Flush() 
$$ UpdaterefreshCntr;} 

else { ReadUpdateCO $$ 
UpdateRefreshCounterO;} 
} 

} 

else{ 

if (tagfwrj == wb) { Refresh() $$ ReadCache();} 
r dirty status for the line unchanged V 
else{ 

BlockRefresh; 

if (dirtyfwr]) { Flush() $$ Read(); } 
else ReadUpdateCO; 

J 

} 

} 

} r end else there is a dirty line */ 
} /* end if rb != cache V 
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else r the cache bank is being refreshed */ { 
if(dirtyfwr]){ 

if (taglwr] == wb) { 

BlodcRefiresh; 
ReadCacheQ $$ HushQ; 

} 

else { 

BlockRefresh; 
ReadO$$FlushO; 

) 

} 

else { 

RefreshQ 
ReadO 

} 

} 

} /* end refresh pending */ 
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/••♦WRITE*"/ 

/• No pending refresh */ 

If (no refresh pending) { 

r there is no dirty line V 
if (no dirty line) {WriteQ; ) 
else { r there is a diity line V 
if(ldirty(wr]) {WriteQ:} 
else{ 

if (Cachetag[wr] == wb) { WriteBoth() $$ dirty[wr] « 0: } 
else {WnteO $$ Flush():} 

} 

}/* end dirty line V 
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Pending refresh */ 



else { 

If (rb != cache) { 
if (no dirty line) { 

If (wb != rb) { WriteO $$ RefreshQ } 

else { WriteCacheO $$ dirty[wr] = 1 $$ RefreshQ ;} 

else { I* there is a dirty line */ 

if (rb != wb) { f* refresh bank is different from the access bank */ 
if (rb 1= cachetag[wr]) { 
RefreshO $$ 
lf(dirty[wrj){ 

If (cachetag[wrl != wb) {FlushQ $$ WrHe();} 
Else {WritebothO;} 

} 

else{ 

If (cachetag[wrj 1= wb) { WriteQ;} /* or writeboth() V 
Else {WritebothO;} 

} 

else{ 

If (dirtylwr]) { Refresh() $$ Write();} /* cache line remains dirty */ 
else { RefreshO $$ WriteQ :) /* Or writebothQ */ 

} 

} 

else { r refresh bank is the same as the access bank V 
if (dirty[wr]){ 

. If (cachetag[wr] == wb) { Writecache();} 
else{ 

If (wr rr) {/• lucky day*/ 

FlushO $$ writeO $$ Updaterefreshoounter; 

} 

else { 

FlushO 9nd write to cache with new data ; 
$$ RefreshO; 

) 

) 

else { /* the line is not dirty V 
r create another dirty line */ 

Refresh $$ 

WriteCacheO; 

} 

} 

} 
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else { I* cache bank is being refreshed */ 
WriteO $$ 
lf(dirty[wr]){ 

if (cachetag[wr] =swb){ 
RefreshO $$ 
Cachetag[wr] = NULL; 

) 

el8e{ 

RefreshQ; 

r unless wr - rr then we writeback arKJ dear dirty bit */ 

} 

} 

else { I* not dirty */ 
RefreshO; 

if (cachetag{wr] wb) { Cachetag[vvr] » NULL;} 

) 

} 

) 
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